From ea16a8b0a1fd402ff916ddaaae77fee40cce424a Mon Sep 17 00:00:00 2001 From: Jeffrey C Honig Date: Mon, 20 Aug 2007 03:05:33 +0000 Subject: [PATCH] (mh-forward): Address SF 1730393. When forwarding with mml, messages were included in reverse order. --- lisp/mh-e/mh-comp.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/mh-e/mh-comp.el b/lisp/mh-e/mh-comp.el index b74c445238e..a71de8246c5 100644 --- a/lisp/mh-e/mh-comp.el +++ b/lisp/mh-e/mh-comp.el @@ -497,7 +497,9 @@ See also `mh-compose-forward-as-mime-flag', (dolist (msg msgs) (setq i (1+ i)) (mh-mml-forward-message (format description i) - folder msg)))))) + folder msg) + ;; Was inserted before us, move to end of file to preserve order + (goto-char (point-max))))))) ;; Postition just before forwarded message (if (re-search-forward "^------- Forwarded Message" nil t) (forward-line -1) -- 2.30.2